home *** CD-ROM | disk | FTP | other *** search
- :polyc
-
- c:\neuron\batch\Ben menuF c:\neuron\batch\plc.mnu
-
- IF ERRORLEVEL 6 GOTO end
- IF ERRORLEVEL 5 GOTO polchlp
- IF ERRORLEVEL 4 GOTO Util
- IF ERRORLEVEL 3 GOTO polc3
- IF ERRORLEVEL 2 GOTO polc2
- IF ERRORLEVEL 1 GOTO polc1
- IF ERRORLEVEL 0 GOTO END
-
- :polc1
- c:\neuron\batch\Ben cls blue
- IF NOT EXIST Polyc1.par copy c:\neuron\batch\Polyc1.par
- Edit Polyc1.par
- c:\neuron\Polyc<Polyc1.par
- c:\neuron\batch\Ben cls blue
- pause
- GOTO polyc
-
- :polc2
- c:\neuron\batch\Ben cls blue
- c:\neuron\Polyc
- pause
- c:\neuron\batch\Ben cls blue
- GOTO polyc
-
- :polc3
- If Not EXIST Polyc.out GOTO polyc
- c:\neuron\batch\Ben list Polyc.out Polyc.out
- GOTO polyc
-
- :Util
- call c:\neuron\batch\Deldir
- GOTO polyc
-
- :polchlp
- c:\neuron\batch\Ben List c:\neuron\batch\polc.hlp Functional~Link~Help
- GOTO polyc
-
- :End